home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 2000 August: Tool Chest / Dev.CD Aug 00 TC Disk 2.toast / pc / sample code / human interface toolbox / packagetool / packagetool.c < prev    next >
Encoding:
C/C++ Source or Header  |  2000-06-23  |  12.3 KB  |  394 lines
  1. /*
  2.     File: PackageTool.c
  3.     
  4.     Description:
  5.         This file contains the main event dispatching code used in the PackageTool
  6.     application.
  7.     
  8.     PackageTool is an application illustrating how to create application
  9.     packages in Mac OS 9.  It provides a simple interface for converting
  10.     correctly formatted folders into packages and vice versa.
  11.  
  12.     Copyright:
  13.         © Copyright 1999 Apple Computer, Inc. All rights reserved.
  14.     
  15.     Disclaimer:
  16.         IMPORTANT:  This Apple software is supplied to you by Apple Computer, Inc.
  17.         ("Apple") in consideration of your agreement to the following terms, and your
  18.         use, installation, modification or redistribution of this Apple software
  19.         constitutes acceptance of these terms.  If you do not agree with these terms,
  20.         please do not use, install, modify or redistribute this Apple software.
  21.  
  22.         In consideration of your agreement to abide by the following terms, and subject
  23.         to these terms, Apple grants you a personal, non-exclusive license, under Apple’s
  24.         copyrights in this original Apple software (the "Apple Software"), to use,
  25.         reproduce, modify and redistribute the Apple Software, with or without
  26.         modifications, in source and/or binary forms; provided that if you redistribute
  27.         the Apple Software in its entirety and without modifications, you must retain
  28.         this notice and the following text and disclaimers in all such redistributions of
  29.         the Apple Software.  Neither the name, trademarks, service marks or logos of
  30.         Apple Computer, Inc. may be used to endorse or promote products derived from the
  31.         Apple Software without specific prior written permission from Apple.  Except as
  32.         expressly stated in this notice, no other rights or licenses, express or implied,
  33.         are granted by Apple herein, including but not limited to any patent rights that
  34.         may be infringed by your derivative works or by other works in which the Apple
  35.         Software may be incorporated.
  36.  
  37.         The Apple Software is provided by Apple on an "AS IS" basis.  APPLE MAKES NO
  38.         WARRANTIES, EXPRESS OR IMPLIED, INCLUDING WITHOUT LIMITATION THE IMPLIED
  39.         WARRANTIES OF NON-INFRINGEMENT, MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  40.         PURPOSE, REGARDING THE APPLE SOFTWARE OR ITS USE AND OPERATION ALONE OR IN
  41.         COMBINATION WITH YOUR PRODUCTS.
  42.  
  43.         IN NO EVENT SHALL APPLE BE LIABLE FOR ANY SPECIAL, INDIRECT, INCIDENTAL OR
  44.         CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
  45.         GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  46.         ARISING IN ANY WAY OUT OF THE USE, REPRODUCTION, MODIFICATION AND/OR DISTRIBUTION
  47.         OF THE APPLE SOFTWARE, HOWEVER CAUSED AND WHETHER UNDER THEORY OF CONTRACT, TORT
  48.         (INCLUDING NEGLIGENCE), STRICT LIABILITY OR OTHERWISE, EVEN IF APPLE HAS BEEN
  49.         ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  50.  
  51.     Change History (most recent first):
  52.         Fri, Dec 17, 1999 -- created
  53. */
  54.  
  55.  
  56. #include "PackageTool.h"
  57. #include "Utilities.h"
  58.  
  59. #include <Fonts.h>
  60. #include <Dialogs.h>
  61. #include <PLStringFuncs.h>
  62. #include <TextUtils.h>
  63. #include <Gestalt.h>
  64. #include <StdIO.h>
  65. #include <Devices.h>
  66. #include <Appearance.h>
  67. #include <Resources.h>
  68. #include <Navigation.h>
  69.  
  70. #include "SimplePrefs.h"
  71. #include "PackageUtils.h"
  72. #include "PackageWindow.h"
  73.  
  74.  
  75.     /* application's globals */
  76. Boolean gRunning = true; /* true while the application is running, set to false to quit */
  77. Collection gPreferences = NULL; /* main preferences collection, saved in the prefs file.  */
  78. Boolean gIsFrontProcess = true;
  79.  
  80.  
  81. /* GetCollectedPreferences returns the collection that is used for storing
  82.     application preferences. */
  83. Collection GetCollectedPreferences(void) {
  84.     return gPreferences;
  85. }
  86.  
  87. /* IsFrontProcess returns true when our
  88.     application is the frontmost process. */
  89. Boolean IsFrontProcess(void) {
  90.     return gIsFrontProcess;
  91. }
  92.  
  93.  
  94.  
  95.  
  96. /* OpenDocumentList is called when the application receives a document a list of
  97.     documents to open.  */
  98. OSErr OpenDocumentList(AEDescList *documents) {
  99.     OSErr err;
  100.     long n;
  101.     FSSpec fileSpec, packageSpec;
  102.     AEKeyword keyWd;
  103.     DescType typeCd;
  104.     Size actSz;
  105.         
  106.         /* count the documents in the list, there must be at least one */
  107.     err = AECountItems(documents, &n);
  108.     if (err != noErr) goto bail;
  109.     if (n == 0) { err = paramErr; goto bail; }
  110.         /* get the first one */
  111.     err = AEGetNthPtr(documents, 1, typeFSS, &keyWd, &typeCd,
  112.         (Ptr) &fileSpec, sizeof(fileSpec), (actSz = sizeof(fileSpec), &actSz));
  113.     if (err != noErr) goto bail;
  114.     
  115.         /* set the display */
  116.     if (IdentifyPackage(&fileSpec, &packageSpec))
  117.         SetNewDisplay(&fileSpec);
  118.     else if (FSSpecIsAFolder(&fileSpec))
  119.         SetNewDisplay(&fileSpec);
  120.     else SetNewDisplay(NULL);
  121.  
  122. bail:
  123.     return err;
  124. }
  125.  
  126.  
  127.  
  128.  
  129. /* ResetMenus is called to reset the menus immediately before
  130.     either MenuSelect or MenuKey is called. */
  131. static void ResetMenus(void) {
  132.         /* Here, we set the file selection item depending on
  133.         the availability of navigation services.  */
  134.     if (NavServicesAvailable())
  135.         EnableMenuItem(GetMenuHandle(mFile), iSelect);
  136.     else DisableMenuItem(GetMenuHandle(mFile), iSelect);
  137. }
  138.  
  139.  
  140. /* DoMenuCommand is called after either MenuSelect of MenuKey.  The
  141.     parameter rawMenuSelectResult is the result from one of these two routines. 
  142.     DoMenuCommand parses this result into its two parts, and dispatches
  143.     the menu command as appropriate. */
  144. static void DoMenuCommand(long rawMenuSelectResult) {
  145.     short menu, item;
  146.         /* decode the MenuSelect result */
  147.     menu = (rawMenuSelectResult >> 16);
  148.     if (menu == 0) return;
  149.     item = (rawMenuSelectResult & 0x0000FFFF);
  150.         /* dispatch on result */
  151.     switch (menu) {
  152.         case mApple:
  153.             if (item == iAbout) {
  154.                     /* show the about box. */
  155.                 ParamAlert(kAboutBoxAlert, NULL, NULL);
  156.             }
  157.             break;
  158.         case mFile:
  159.             if (item == iSelect) {
  160.                 SelectFolderOrPackage();
  161.             } else if (item == iQuit)
  162.                 gRunning = false; /* file.quit == quit */
  163.             break;
  164.         case mEdit:
  165.             if (item == iClear)
  166.                 SetNewDisplay(NULL); /* edit.clear == clear the display */
  167.             break;
  168.     }
  169.         /* unhilite the menu once we're done the command */
  170.     HiliteMenu(0);
  171. }
  172.  
  173.  
  174.  
  175.  
  176.  
  177.  
  178.  
  179. /* OpenApplication is an apple event handler called for 'open application' apple events. */
  180. static pascal OSErr OpenApplication(const AppleEvent *appleEvt, AppleEvent* reply, unsigned long refcon) {
  181.     return noErr;
  182. }
  183.  
  184. /* CloseApplication is an apple event handler called for 'close application' apple events. */
  185. static pascal OSErr CloseApplication(const AppleEvent *appleEvt, AppleEvent* reply, unsigned long refcon) {
  186.     gRunning = false;
  187.     return noErr;
  188. }
  189.  
  190.  
  191. /* OpenDocument is called for 'odoc' Apple events.  We install this routine
  192.     as our open document apple event handler when our application starts up. */
  193. static pascal OSErr OpenDocument(const AppleEvent *appleEvt, AppleEvent* reply, unsigned long refcon) {
  194.     OSErr err;
  195.     AEDescList documents;
  196.     
  197.         /* initial state */
  198.     AECreateDesc(typeNull, NULL, 0, &documents);
  199.     
  200.         /* get the document list */
  201.     err = AEGetParamDesc(appleEvt, keyDirectObject, typeAEList, &documents);
  202.     if (err != noErr) goto bail;
  203.     
  204.         /* call our document opener routine */
  205.     err = OpenDocumentList(&documents);
  206.  
  207. bail:
  208.     AEDisposeDesc(&documents);
  209.     return err;
  210. }
  211.  
  212.  
  213. /* EVENT HANDLING ------------------------------------------------ */
  214.  
  215.  
  216. /* HandleNextEvent handles the event in the event record *ev dispatching
  217.     the event to appropriate routines.   */
  218. void HandleNextEvent(EventRecord *ev) {
  219.     DialogPtr theDialog;
  220.     WindowPtr theWindow;
  221.     short itemNo;
  222.     
  223.         /* dialog pre-processing */
  224.     if (((ev->what == keyDown) || (ev->what == autoKey)) && ((ev->modifiers & cmdKey) != 0)) {
  225.         ResetMenus();
  226.         DoMenuCommand(MenuKey((char) (ev->message & charCodeMask)));
  227.     } else if (ev->what == osEvt) {
  228.         WindowPtr target;
  229.         if ( ((ev->message >> 24) & 0x0FF) == suspendResumeMessage ) {
  230.             gIsFrontProcess = (ev->message & resumeFlag) != 0;/* switching in */
  231.             target = FrontWindow();
  232.             if (IsPackageWindow(target))
  233.                 ActivatePackageWindow(target, gIsFrontProcess);
  234.         }
  235.     } else if (ev->what == activateEvt) {
  236.         WindowPtr target;
  237.         target = (WindowPtr) ev->message;
  238.         if (IsPackageWindow(target))
  239.             ActivatePackageWindow(target, ((ev->modifiers & activeFlag) != 0));
  240.     }
  241.  
  242.         /* handle clicks in the dialog window */
  243.     if (IsDialogEvent(ev))
  244.         if (DialogSelect(ev, &theDialog, &itemNo)) {
  245.             if (IsPackageWindow(GetDialogWindow(theDialog)))
  246.                 HitPackageWindow(theDialog, ev, itemNo);
  247.         }
  248.  
  249.         /* clicks and apple events... */
  250.     if (ev->what == kHighLevelEvent) {
  251.         AEProcessAppleEvent(ev);
  252.     } else if (ev->what == mouseDown)
  253.         switch (FindWindow(ev->where, &theWindow)) {
  254.             
  255.                 /* menu bar clicks */
  256.             case inMenuBar:
  257.                 ResetMenus();
  258.                 DoMenuCommand(MenuSelect(ev->where));
  259.                 break;
  260.                 
  261.                 /* clicks in the close box, close the app */
  262.             case inGoAway:
  263.                 if (TrackGoAway(theWindow, ev->where)) {
  264.                     gRunning = false;
  265.                 }
  266.                 break;
  267.                 
  268.                 /* allow window drags */
  269.             case inDrag:
  270.                 if (theWindow == FrontWindow()) {
  271.                     Rect boundsRect = { -32000, -32000, 32000, 32000};
  272.                     DragWindow(theWindow, ev->where, &boundsRect);
  273.                 }
  274.                 break;
  275.         }
  276. }
  277.  
  278.  
  279.  
  280.  
  281. /* MyIdleProc is the idle procedure called by AEInteractWithUser while we are waiting
  282.     for the application to be pulled into the forground.  It simply passes the event along
  283.     to HandleNextEvent */
  284. static pascal Boolean MyIdleProc(EventRecord *theEvent, long *sleepTime, RgnHandle *mouseRgn) {
  285.     HandleNextEvent(theEvent);
  286.     return false;
  287. }
  288.  
  289. /* ParamAlert is a general alert handling routine.  If Apple events exist, then it
  290.     calls AEInteractWithUser to ensure the application is in the forground, and then
  291.     it displays an alert after passing the s1 and s2 parameters to ParamText. */
  292. OSStatus ParamAlert(short alertID, StringPtr s1, StringPtr s2) {
  293.     AEIdleUPP theIdleUPP;
  294.     OSStatus err;
  295.     theIdleUPP = NewAEIdleProc(MyIdleProc);
  296.     if (theIdleUPP == NULL) { err = memFullErr; goto bail; }
  297.     err = AEInteractWithUser(kNoTimeOut, NULL, theIdleUPP);
  298.     if (err != noErr) goto bail;
  299.     ParamText(s1, s2, NULL, NULL);
  300.     err = Alert(alertID, NULL);
  301.     DisposeAEIdleUPP(theIdleUPP);
  302.     return err;
  303. bail:
  304.     if (theIdleUPP != NULL) DisposeAEIdleUPP(theIdleUPP);
  305.     return err;
  306. }
  307.  
  308.  
  309.  
  310.  
  311. /* main program */
  312.  
  313. int main(void) {
  314.     OSErr err;
  315.     long response;
  316.     AEEventHandlerUPP aehandler;
  317.     
  318.         /* set up the managers */
  319.     InitCursor();
  320.         
  321.         /* Packages are not supported in versions of the Finder
  322.         prior to Mac OS 9.  Although it may be possible to run a
  323.         Carbon application on */
  324.     if (Gestalt('sysv', &response) != noErr) response = 0;
  325.     if (response < 0x0900) {
  326.         Str255 message;
  327.         GetIndString(message, kMainStringList, kMustHaveOS9);
  328.         ParamAlert(kGenericAlert, message, NULL);
  329.         err = userCanceledErr;
  330.         goto bail;
  331.     }
  332.         /* register ourselves as an appearance client */
  333.     err = RegisterAppearanceClient();
  334.     if (err != noErr) goto bail;
  335.     
  336.         /* Apple event handlers */
  337.     aehandler = NewAEEventHandlerProc(OpenApplication);
  338.     if (aehandler == NULL) { err = memFullErr; goto bail; }
  339.     err = AEInstallEventHandler(kCoreEventClass, kAEOpenApplication, aehandler, 0, false);
  340.     if (err != noErr) goto bail;
  341.     aehandler = NewAEEventHandlerProc(CloseApplication);
  342.     if (aehandler == NULL) { err = memFullErr; goto bail; }
  343.     err = AEInstallEventHandler(kCoreEventClass, kAEQuitApplication, aehandler, 0, false);
  344.     if (err != noErr) goto bail;
  345.     aehandler = NewAEEventHandlerProc(OpenDocument);
  346.     if (aehandler == NULL) { err = memFullErr; goto bail; }
  347.     err = AEInstallEventHandler(kCoreEventClass, kAEOpenDocuments, aehandler, 0, false);
  348.     if (err != noErr) goto bail;
  349.  
  350.         /* get our preferences */    
  351.     gPreferences = NewCollection();
  352.     if (gPreferences == NULL) { err = memFullErr; goto bail; }
  353.     GetPreferences(kAppPrefsType, kAppCreatorType, gPreferences);
  354.  
  355.         /* ***** set up the menu bar ***** */
  356.     SetMenuBar(GetNewMBar(kMenuBarResource));
  357.     DrawMenuBar();
  358.     
  359.         /* open the window */
  360.     err = CreatePackageWindow();
  361.     if (err != noErr) {
  362.         Str255 errStr;
  363.         NumToString(err, errStr);
  364.         ParamAlert(kOpenAppFailedAlert, errStr, NULL);
  365.     }
  366.  
  367.         /* run the main loop */
  368.     while (gRunning) {
  369.         EventRecord ev;
  370.             /* get the next event */
  371.         if ( ! WaitNextEvent(everyEvent, &ev,  GetCaretTime(), NULL) )
  372.             ev.what = nullEvent;
  373.         HandleNextEvent(&ev);
  374.     }
  375.     
  376.         /* all done */
  377.     ClosePackageWindow();
  378.     UnregisterAppearanceClient();
  379.     SavePreferences(kAppPrefsType, kAppCreatorType, "\pPackageTool Preferences", gPreferences);
  380.     DisposeCollection(gPreferences);
  381.     ExitToShell();
  382.     return 0;
  383. bail:
  384.     if (err != userCanceledErr) {
  385.         Str255 errStr;
  386.         NumToString(err, errStr);
  387.         ParamAlert(kMainFailedAlert, errStr, NULL);
  388.     }
  389.     ExitToShell();
  390.     return 1;
  391. }
  392.  
  393.  
  394.